* lisp/net/shr.el (shr-make-table-1): Fix colspan typo.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 044c2999396caff7fb1f8c6413dcc9349d922429..8af0ec46cadde938be88596813d4e1806b05cabe 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2015-01-26  Lars Ingebrigtsen  <larsi@gnus.org>
 
+       * net/shr.el (shr-make-table-1): Fix colspan typo.
+
        * net/eww.el (eww-add-bookmark): Fix prompt and clean up the code
        slightly.
 

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index feb934c71908a30b2fe6cadd7d360151f063305d..a0c9eba4144f5bfb665cce6f83b605bffcc1bcbd 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1660,7 +1660,7 @@ The preference is a float determined from `shr-prefer-media-type'."
                        (aref widths width-column)
                      10))
              (when (and fill
-                        (setq colspan (dom-attr column colspan)))
+                        (setq colspan (dom-attr column 'colspan)))
                (setq colspan (min (string-to-number colspan)
                                   ;; The colspan may be wrong, so
                                   ;; truncate it to the length of the